home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / language / embedded / simulato / v2_3_mc6.tz / v2_3_mc6 / testfiles / speed.asm < prev    next >
Assembly Source File  |  1994-05-02  |  657b  |  28 lines
  1. ;
  2. ;  speed.asm
  3. ;  C. Ward 2/7/93
  4. ;
  5. ;  Runs through a loop a few times to run a performance
  6. ;  test on the simulation.  Currently (Sparc station 1+)
  7. ;  it takes 2 seconds to run.
  8. ;
  9. ;
  10.      ORG $1000           
  11.      MOVE.L #$00,A0           
  12.      MOVE.L #$1200,A1          
  13.      CLR.L (A1)          
  14.      CLR.L D1           
  15.      MOVE.L #$1,D0           
  16.      MOVE.B #$2,D1           
  17.      SWAP D1           
  18.      MOVE.B #$0,D1           
  19. LOOP SWAP D1           
  20.      ADDA D0,A0           
  21.      MULU D1,D1           
  22.      CMPA.L #$500,A0           
  23.      BNE LOOP      
  24.      MOVE.L A0,(A1)          
  25.      MOVE #228,D7           
  26.      TRAP #14         
  27.      END
  28.